home *** CD-ROM | disk | FTP | other *** search
/ Delphi Programmer's Power Pack / Delphi Volume 1.iso / s_to_z / strchpnl / stretchd.dfm / stretchd.txt
Text File  |  1996-09-15  |  4KB  |  188 lines
  1. object Stretchy: TStretchy
  2.   Left = 4
  3.   Top = 5
  4.   Width = 513
  5.   Height = 393
  6.   Caption = 'TStretchPanel Demonstration Form'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'System'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   TextHeight = 16
  13.   object Stretchy1: TStretchPanel
  14.     Left = 0
  15.     Top = 0
  16.     Width = 148
  17.     Height = 366
  18.     Hint = 'Left aligned TStretchPanel--stretch in design mode.'
  19.     Align = alLeft
  20.     Font.Color = clBlack
  21.     Font.Height = -11
  22.     Font.Name = 'Arial'
  23.     Font.Style = [fsBold]
  24.     ParentFont = False
  25.     ParentShowHint = False
  26.     ShowHint = False
  27.     TabOrder = 0
  28.     Anchors = []
  29.     KeepAspect = NoAspect
  30.     StretchControls = True
  31.     StretchFonts = True
  32.     object Label2: TLabel
  33.       Left = 26
  34.       Top = 124
  35.       Width = 80
  36.       Height = 55
  37.       Alignment = taCenter
  38.       Caption = 'This Align left TStretchPanel only resizes vertically.'
  39.       WordWrap = True
  40.     end
  41.     object Memo1: TMemo
  42.       Left = 14
  43.       Top = 13
  44.       Width = 120
  45.       Height = 92
  46.       Lines.Strings = (
  47.         'A TMemo... '
  48.         'TStretchPanel also '
  49.         'works for '
  50.         'TDBMemo, '
  51.         'TDBListboxes, etc.')
  52.       TabOrder = 0
  53.     end
  54.     object Edit1: TEdit
  55.       Left = 14
  56.       Top = 319
  57.       Width = 120
  58.       Height = 22
  59.       TabOrder = 1
  60.       Text = 'TEdits stretch!'
  61.     end
  62.     object TabbedNotebook1: TTabbedNotebook
  63.       Left = 14
  64.       Top = 202
  65.       Width = 120
  66.       Height = 91
  67.       TabFont.Color = clBtnText
  68.       TabFont.Height = -11
  69.       TabFont.Name = 'MS Sans Serif'
  70.       TabFont.Style = []
  71.       TabOrder = 2
  72.       object TTabPage
  73.         Left = 4
  74.         Top = 24
  75.         Caption = 'Tab1'
  76.       end
  77.       object TTabPage
  78.         Left = 4
  79.         Top = 24
  80.         Caption = 'Tab2'
  81.       end
  82.       object TTabPage
  83.         Left = 4
  84.         Top = 24
  85.         Caption = 'Tab3'
  86.       end
  87.     end
  88.   end
  89.   object Stretchy2: TStretchPanel
  90.     Left = 148
  91.     Top = 0
  92.     Width = 357
  93.     Height = 366
  94.     Align = alClient
  95.     Caption = 'I'#39'm a StretchPanel--resize me and my controls grow and shrink!'
  96.     Font.Color = clBlack
  97.     Font.Height = -12
  98.     Font.Name = 'Times New Roman'
  99.     Font.Style = [fsBold]
  100.     ParentFont = False
  101.     TabOrder = 1
  102.     Anchors = []
  103.     KeepAspect = NoAspect
  104.     StretchControls = True
  105.     StretchFonts = True
  106.     object Label1: TLabel
  107.       Left = 56
  108.       Top = 11
  109.       Width = 97
  110.       Height = 15
  111.       Alignment = taCenter
  112.       Caption = 'The Month'
  113.     end
  114.     object Gauge1: TGauge
  115.       Left = 34
  116.       Top = 232
  117.       Width = 44
  118.       Height = 119
  119.       Color = clWhite
  120.       Kind = gkVerticalBar
  121.       ForeColor = clBlue
  122.       ParentColor = False
  123.       Progress = 37
  124.     end
  125.     object SpeedButton1: TSpeedButton
  126.       Left = 96
  127.       Top = 268
  128.       Width = 27
  129.       Height = 28
  130.       Glyph.Data = {
  131.         F8000000424DF800000000000000760000002800000010000000100000000100
  132.         04000000000000000000120B0000120B00000000000000000000000000000000
  133.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  134.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
  135.         5555000050000005555544F00BFBFBF0555544F0BFBF0000055544F0FBFBFBFB
  136.         F05544F0BFBF0000000544F0F000FBFBF00544F0B0B000000F000000F0F000FB
  137.         FB0F555500BFBFBFB0F455555500FBFB0F44555555550000F44455555555550F
  138.         44445555555555500444555555555555500455555555555555500000}
  139.     end
  140.     object Button1: TButton
  141.       Left = 18
  142.       Top = 202
  143.       Width = 103
  144.       Height = 23
  145.       Caption = 'Buttons Stretch!'
  146.       TabOrder = 0
  147.     end
  148.     object ListBox1: TListBox
  149.       Left = 224
  150.       Top = 32
  151.       Width = 107
  152.       Height = 124
  153.       ItemHeight = 15
  154.       Items.Strings = (
  155.         'Note that'
  156.         'fonts stretch'
  157.         'only with'
  158.         'vertical size'
  159.         'changes.')
  160.       TabOrder = 1
  161.     end
  162.     object DirectoryListBox1: TDirectoryListBox
  163.       Left = 144
  164.       Top = 232
  165.       Width = 133
  166.       Height = 116
  167.       ItemHeight = 16
  168.       TabOrder = 2
  169.     end
  170.     object Calendar1: TCalendar
  171.       Left = 13
  172.       Top = 32
  173.       Width = 178
  174.       Height = 124
  175.       StartOfWeek = 0
  176.       TabOrder = 3
  177.     end
  178.     object CheckBox1: TCheckBox
  179.       Left = 143
  180.       Top = 202
  181.       Width = 153
  182.       Height = 13
  183.       Caption = 'Checkboxes don'#39't stretch.'
  184.       TabOrder = 4
  185.     end
  186.   end
  187. end
  188.